﻿Public Class frmmain

    Private Sub btnthongtinhocsinh_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnthongtinhocsinh.Click
        Dim frm As New frmhosohocsinh()
        frm.ShowDialog()
    End Sub

    Private Sub btnthongtinlophoc_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnthongtinlophoc.Click
        Dim frm As New frmLop()
        frm.ShowDialog()
    End Sub

    Private Sub btnxembangdiem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnxembangdiem.Click
        Dim frm As New frmbangdiem()
        frm.ShowDialog()
    End Sub

    Private Sub btntracuuhocsinh_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btntracuuhocsinh.Click
        Dim frm As New frmtracuu()
        frm.ShowDialog()
    End Sub

    Private Sub btntongketmonhoc_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btntongketmonhoc.Click
        Dim frm As New frmtongketmon()
        frm.ShowDialog()
    End Sub

    Private Sub btntongkethocky_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btntongkethocky.Click
        Dim frm As New frmtongkethocky()
        frm.ShowDialog()
    End Sub

    Private Sub btndong_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btndong.Click
        Me.Close()
    End Sub
End Class